home *** CD-ROM | disk | FTP | other *** search
- assume cs:text
- text segment para public 'CODE'
-
- public _setfs
- _setfs proc near
- mov ax,4[esp]
- mov fs,ax
- ret
- _setfs endp
-
- public _getpallet
- _getpallet proc near
- push edx
- mov edx,8[esp]
- mov ax,0110H
- push fs
- mov fs,ax
- mov ax,0501H
- call pword ptr fs:[01c0H]
- pop fs
- pop edx
- ret
- _getpallet endp
-
- public _putfs
- _putfs proc near
- push ebx
- mov eax,8[esp]
- mov ebx,12[esp]
- mov fs:[eax],ebx
- pop ebx
- ret
- _putfs endp
-
- public _getfs
- _getfs proc near
- mov eax,4[esp]
- mov eax,fs:[eax]
- ret
- _getfs endp
-
- text ends
- end
-